home *** CD-ROM | disk | FTP | other *** search
/ Stone Design / Stone Design.iso / Stone_Friends / Wave / WavesWorld / Examples / eyes / martianEye2.wwModel / controls.nib / data.nib (.txt) < prev   
Encoding:
NeXT TypedStream Data  |  1995-03-22  |  16.8 KB  |  148 lines
  1. typedstream
  2. IBObjectData
  3. Object
  4. CustomObject
  5. WWTCLInterp
  6. WWTextField
  7.     TextField
  8. Control
  9.     Responder
  10. [17@]
  11. WWColorWell
  12. NXColorWell
  13. (set sphere(color) {%f %f %f}; updateView
  14. sphere(color)
  15. WWThumbWheel
  16. PAThumbWheel
  17. WWThumbWheelCell
  18. PAThumbWheelCell
  19. ActionCell
  20.     Helvetica
  21. #set upperLid(rotate) %f; updateView
  22. upperLid(rotate)
  23. WWTextFieldCell
  24. TextFieldCell
  25. -360.0
  26. eye Open
  27. WWSlider
  28. Slider
  29. WWSliderCell
  30. SliderCell
  31. dddf@d@
  32. NXImage
  33. NXCachedImageRep
  34. NXImageRep
  35. iisssssS
  36. iiiiiiS
  37. [2000c]
  38. !set sphere(xScale) %f; updateView
  39. sphere(xScale)
  40. -10.00
  41. !set sphere(yScale) %f; updateView
  42. sphere(yScale)
  43. !set sphere(zScale) %f; updateView
  44. sphere(zScale)
  45. 6set sphere(volumePreservingScaleFactor) %f; updateView
  46. #sphere(volumePreservingScaleFactor)
  47. xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxp
  48. xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxp
  49. xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxp
  50. xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxp
  51. xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxp
  52. xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxp
  53. xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxp
  54. xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxp
  55. scale
  56. set blink(downU) %f; updateView
  57. blink(downU)
  58. downU
  59. set blink(upU) %f; updateView
  60. blink(upU)
  61. "set blink(thetaMax) %f; updateView
  62. blink(thetaMax)
  63. thetaMax
  64. $set eyeBall(irisSize) %f; updateView
  65. eyeBall(irisSize)
  66. irisSize
  67. %set eyeBall(bloodShot) %f; updateView
  68. eyeBall(bloodShot)
  69.     bloodShot
  70. %set eyeBall(pupilSize) %f; updateView
  71. eyeBall(pupilSize)
  72.     pupilSize
  73. Matrix
  74. @:@iiii
  75. ButtonCell
  76. Radio
  77. control_stop
  78. control_stopH
  79. control_play
  80. control_playH
  81. ff@@#::s
  82. NXradio
  83. NXradioH
  84. -set sideToSide(howManySeconds) %f; updateView
  85. sideToSide(howManySeconds)
  86. sideToSide
  87. )set dilate(howManySeconds) %f; updateView
  88. dilate(howManySeconds)
  89. dilate
  90. (set blink(howManySeconds) %f; updateView
  91. blink(howManySeconds)
  92. blink
  93. ,set constrict(howManySeconds) %f; updateView
  94. constrict(howManySeconds)
  95.     constrict
  96. 'set eyeBall(leftToRight) %f; updateView
  97. eyeBall(leftToRight)
  98. $set eyeBall(upToDown) %f; updateView
  99. eyeBall(upToDown)
  100. rotate
  101. "set coneCoefficient %f; updateView
  102. coneCoefficient
  103. &set coneOfPower(length) %f; updateView
  104. coneOfPower(length)
  105.     coneAngle
  106. set coneangle %f; updateView
  107.     coneangle
  108.     WWTTTimer
  109. @:diciffffc
  110. blinkMotorProgram $blink(u) $blink(downU) $blink(upU) $blink(initialTheta) $blink(thetaMax); 
  111. set blink(u) [expr $blink(u) + ($blink(uIncr) * [synchWithScene])];  
  112. preBlink
  113. postBlink $blink(initialTheta)
  114. $blink(u) <= 1
  115. sideToSideMotorProgram $sideToSide(u) $sideToSide(initialRotate) $sideToSide(minRotate) $sideToSide(maxRotate) $sideToSide(extentA) $sideToSide(extentB) $sideToSide(extentC)  ; 
  116. set sideToSide(u) [expr $sideToSide(u) + ($sideToSide(uIncr) * [synchWithScene])];  
  117. preSideToSide
  118. )postSideToSide $sideToSide(initialRotate)
  119. $sideToSide(u) <= 1
  120. WindowTemplate
  121. iiii***@s@
  122. Martian EyeBall controls
  123. Panel
  124. constrictMotorProgram $constrict(u) $constrict(pupilMax) $constrict(extent); 
  125. set constrict(u) [expr $constrict(u) + ($constrict(uIncr) * [synchWithScene])];  
  126. preConstrict
  127. postConstrict $dilate(pupilMin)
  128. $constrict(u) <= 1
  129. dilateMotorProgram $dilate(u) $dilate(pupilMin) $dilate(extent); 
  130. set dilate(u) [expr $dilate(u) + ($dilate(uIncr) * [synchWithScene])];  
  131.     preDilate
  132. postDilate $dilate(pupilMax)
  133. $dilate(u) <= 1
  134. controls,
  135. File's Owner
  136. [24@]
  137. IBOutletConnector
  138. IBConnector
  139. controlPanel
  140. IBControlConnector
  141. evalUsingColor:
  142. evalUsingFloatValue:
  143. stopButton
  144. startButton
  145. interp
  146. stop:
  147. start:
  148.